 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"><!-- InstanceBegin template="/Templates/hinhmaunguoidung.dwt.asp" codeOutsideHTMLIsLocked="false" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!-- InstanceBeginEditable name="doctitle" -->
<title>Phiếu cho điểm sản phẩm</title>
<script language="javascript">
function messageWindow(title)
{

if(document.phieudiem.PhieuTrong.checked)
  {
  	url="InAllPhieuDiemSanPham.asp";  
	var height=screen.height;
  	var width=screen.width;
	var newWindow = window.open(url,"msgWindow","status,menubar,scrollbars,height=600,width=800");
  	newWindow.focus( );
  }
  else
  {
  url="InPhieuDiemSanPham.asp?MaThanhVien="+phieudiem.MaThanhVien.value;
  var height=screen.height;
  var width=screen.width;
	//content="status,menubar,scrollbars,height=" + height + ",width=" + width +")";
	//var newWindow = window.open(url,"msgWindow",content);
  var newWindow = window.open(url,"msgWindow", "status,menubar,scrollbars,height=600,width=800");
  newWindow.focus( );
  }
}
</script>
<!-- InstanceEndEditable -->
<!-- InstanceBeginEditable name="head" -->
<!-- InstanceEndEditable -->
</head>
 
<body>
 
 
 
<%
		MaSanPham=Session("ma_sp")
  	 	MaHoiDong=Session("ma_hd")
	  	MaDoanhNghiep=Session("ma_dn")
	strSQL = "Select ThanhVien.MaThanhVien,TenThanhVien From ThanhVien inner join HoiDongChamDiem  on ThanhVien.MaThanhVien=HoiDongChamDiem.MathanhVien where ThanhVien.Status=1 and MahoiDong='" & MaHoiDong & "' and HoiDongChamDiem.Status=1"
	RS.open strSQL, conn
	
	strSP = "select TenSanPham from SanPham where MaSanPham = '" & Session("ma_sp") & "'"
	dim RSSP
	Set RSSP = Server.CreateObject("ADODB.Recordset")
	
	RSSP.open strSP, conn
	
	strDN = "select TenDoanhNghiep from DoanhNghiep where MaDoanhNghiep =' " &Session("ma_dn") & "'"
	dim RSDN
	Set RSDN = Server.CreateObject("ADODB.Recordset")
	RSDN.open strDN, conn
	
	 if(RSSP.EOF or RSDN.EOF or RS.EOF) then
	 	Response.Write("Bạn chưa nhập đủ các thông số,Xin vui lòng quay lại")
	  else
%>
<h3 align="center">PHIẾU CHO ĐIỂM SẢN PHẨM</h3>
<form action="Ghi_PhieuDiemSanPham.asp" method="post" name="phieudiem" id="phieudiem">
<table width="100%" border="0">
  <tr>
    <td width="23%">Tên sản phẩm:</td>
    <td width="77%"><strong><%=RSSP("TenSanPham")%>
      <input name="masp" type="hidden" id="masp" value="<%=session("ma_sp")%>" />
    </strong></td>
  </tr>
  
  <tr>
    <td>Cơ sở sản xuất:</td>
    <td><strong><%=RSDN("TenDoanhNghiep")%>
        <input name="madn" type="hidden" id="madn" value="<%=session("ma_dn")%>" />
</strong></td>
  </tr>
  <tr>
    <td>Họ tên người chấm điểm:</td>
    <td><select name="MaThanhVien" onchange="window.location='phieudiemsanpham.asp?ma_tv='+this.value">
      <option value="0" >--Chọn một thành viên--</option>
	  <%
	    
	while not (RS.EOF)
     %>
	  <%if (cint(Request.QueryString("ma_tv"))=RS("MaThanhVien")) then  %>
      <option value="<%=RS("MaThanhVien")%>" selected="selected"><%=RS("TenThanhVien")%></option>
	  <%else %>
	  <option value="<%=RS("MaThanhVien")%>"><%=RS("TenThanhVien")%></option>
	  <%end if%>
      <%
	RS.MoveNext
	wend
%>
<%rs.close()%>
    </select>
      <strong>
      <input name="mahd" type="hidden" id="mahd" value="<%=session("ma_hd")%>" />
      </strong></td>
  </tr>
</table>
<%if (cint(Request.QueryString("ma_tv"))>1)  then %>
<p align="center">NỘI DUNG CHO ĐIỂM </p>
  <table width="99%" border="1">
    <tr>
      <th width="7%" scope="col">Thứ tự </th>
      <th width="67%" scope="col">Tên nội dung cho điểm </th>
      <th width="8%" scope="col">Hệ số trọng lượng mi </th>
      <th width="9%" scope="col">Điểm gốc ai </th>
      <th width="9%" scope="col">Tổng số mi x ai </th>
    </tr>
    <%
		rs.open "select * from hesotrongluong where mahoidong="&session("ma_hd"),conn
		dem=1
	%>
	<% while not rs.eof %>
	<tr>
      <td><div align="center"><%=dem%>
        <input name="mahesotrongluong<%=dem%>" type="hidden" id="mahesotrongluong<%=dem%>" value="<%=rs("mahesotrongluong_sanpham")%>" />
      </div></td>
      <td title="<%=rs("GhiChu")%>"><%=rs("TenHeSoTrongLuong")%></td>
      <td><div align="left">
        <input name="mi<%=dem%>" type="text" id="mi<%=dem%>" readonly="1" value="<% =rs("Diem") %>" size="3"  />
      </div></td>
      <td>
	  <%
	    dim rsdiemgoc 
	  	set rsdiemgoc = server.CreateObject("adodb.recordset")
		rsdiemgoc.open "select * from diemsanpham  where mahesotrongluong_sanpham= "& rs("mahesotrongluong_sanpham") & " and MaThanhVien=" & Request.QueryString("ma_tv") & " and MaSanPham=" & MaSanPham,conn
	  %>
	  <% 
	  	if (not rsdiemgoc.eof) then 
		diem = rsdiemgoc("diemgoc")
		else
		diem=0
		end if
	  %>
	  <div align="left">
        <input name="ai<%=dem%>" type="text" id="ai<%=dem%>"  value="<%=diem%>"onblur="if ((this.value>=10)||(this.value<1) || isNaN(this.value)){alert('ai phải là kiểu số và không được nhỏ hơn 1 hoặc lớn hơn 10'); this.value='1'; this.focus();this.select();};" size="3" />
      </div>
	  <% rsdiemgoc.close() %>
	  </td>
      <td>
	    <div align="left">
	      <input name="miai<%=dem%>" type="text" id="miai<%=dem%>" value="0" size="3" readonly="1" />	  
	      </div></td>
    </tr>
	<% dem=dem+1 %>
	<% rs.movenext()%>
	<% wend %>
	<% rs.close()%>
    <tr>
      <td colspan="4"><div align="right"><strong>Điểm tổng hợp a = 
        Σaimi</strong>        
            <input name="dem" type="hidden" id="dem" size="3" value="<%=dem%>"  />
      </div></td>
      <td><input name="ma" type="text" id="ma" value="0" size="3" readonly="1" /></td>
    </tr>
    <tr>
      <td colspan="2">
	          
	  <div align="right">
        <input type="checkbox" name="PhieuTrong"  /><label>In tất cả phiếu điểm đã chấm</label><input name="InPhieuDiem" type="button" id="InPhieuDiem" value="In phiếu điểm" onclick="messageWindow('Phiếu cho điểm sản phẩm')" />
        <input type="submit" name="Submit" value="Ghi lại"  onclick="" onmouseover="kiemtra();tinh();"/>
      </div>
	  </td>
      <td colspan="3"><input type="reset" name="Submit2" value="Hủy bỏ" />
        &nbsp;</td>
    </tr>
  </table>
  <strong><p>
Ghi chú: điểm hệ số trọng lượng mi không được vượt quá 1, tổng các điểm thành phần Σmi = 1<br />
Điểm gốc ai nằm trong khoảng 1 đến 10
</p>
 <%end if%>
</form><% end if%>
 
</body>
<!-- InstanceEnd --></html>
